--[[ 编码: WMS-71-14 名称: 显示前 作者:HAN 日期:2025-1-29 入口函数:BeforeGridShow 功能说明: 如果作有错误信息显示红色 更改记录: --]] json = require ("json") mobox = require ("OILua_JavelinExt") m3 = require("oi_base_mobox") function BeforeGridShow ( strLuaDEID ) local nRet, strRetInfo local arobjs, attrs local n, nCount nRet, arobjs = m3.GetSysDataJson( strLuaDEID ) if ( nRet ~=0 ) then lua.Error( strLuaDEID, debug.getinfo(1), arobjs ) end -- [{"id":"","attrs":[{"attr":"","value":""},..]},..] nCount = #arobjs if (nCount == 0) then return end local obj, id local row_data_set = {} local data_attr local qty, t_qty, m_qty for n = 1, nCount do local row_item = {} obj = arobjs[n] row_item.id = obj.id row_item.attrs = {} data_attr = m3.KeyValueAttrsToObjAttr(obj.attrs) qty = lua.StrToNumber( data_attr.F_QTY ) t_qty = lua.StrToNumber( data_attr.F_TABLE_QTY ) m_qty = lua.StrToNumber( data_attr.F_MEMORY_QTY ) -- 获取 物料编码 和 库区编码 for nIndex = 1, #obj.attrs do local attr_value = {} attr_value.attr = obj.attrs[nIndex].attr attr_value.value = obj.attrs[nIndex].value strCellBkground = '' if (attr_value.attr == 'F_TABLE_QTY') then if ( t_qty ~= qty ) then attr_value.bk_color = "#FF0000" attr_value.text_color = "#FFFFFF" end elseif (attr_value.attr == 'F_MEMORY_QTY') then if ( t_qty ~= m_qty ) then attr_value.bk_color = "#FF1493" attr_value.text_color = "#FFFFFF" end end table.insert( row_item.attrs, attr_value ) end table.insert( row_data_set, row_item) end local action = { { action_type = "reset_data_attr", value = row_data_set } } nRet, strRetInfo = mobox.setAction(strLuaDEID, lua.table2str(action)) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "setAction错误: "..strRetInfo) end end